home *** CD-ROM | disk | FTP | other *** search
/ Workbench Design / WB Collection.iso / workbench werkzeuge / boot tools / bootselector1.31 / install < prev    next >
Text File  |  1996-04-07  |  10KB  |  332 lines

  1. ;
  2. ; $VER: BootSelector Install 2.02 (22.11.95)
  3. ;
  4. ; Copyright (c) 1995 Michael Gollmick.
  5. ;
  6. ;-----------------------------------------------------
  7. ;
  8. ; English texts
  9. ;
  10.  
  11. (set #InstallVersion    "BootSelector Install-Script 2.02")
  12.  
  13. (IF (= @LANGUAGE "english")
  14. (
  15. (set speech 0)
  16.  
  17. (SET #bad-kick        "BootSelector requires at least Kickstart 2.04 !")
  18.  
  19. (set #choose-docdest    "Please choose a path for the documentation file.")
  20. (set #choose-docdest-help " The documentation-file contains the same information as the Amiga-Guide file, but in normal ASCII-format.\n The destination path is should be the same as that one, you usually store your documentations to.")
  21. (set #choose-guidedest    "Please choose a path for the AmigaGuide documentation file.")
  22. (set #choose-guidedest-help " The Amiga-Guide documentation is a file in Hypertext-format, which may be viewed with MultiView or AmigaGuide.\n The destination path should be the same as that one you usually store your AmigaGuide files to. Usually this is HELP:")
  23.  
  24. (set #select-mainf    "\n\nDo you want to install BootSelector 1.31?")
  25. (set #help-mainf    (cat " The main BootSelector file is required to choose between Startup-Sequences. This file is usually placed into the \"C:\" drawer, where it will be found easy.\n\n\n" @copyfiles-help))
  26.  
  27. (set #SelectStartup    "Please choose all the Startup-Sequences you want to install.\n\n")
  28. (set #SelectStartupHelp    " BootSelector needs alternative Startup-Sequences for its work. This alternative Startup-Sequences should be installed into the S:Startup's directory. If you use an older version of BootSelector, you may have alternative Startup-Sequences with same names already and you do not wish to copy all that scripts. Please choose for that reason the needet alternative scripts.\n The Installer-Script makes a savety-clone of your original Startup-Sequence, for loosing no data in an eventual mailfunktion of the script.")
  29.  
  30. (set #choose-guide    "Please choose the language you want for the Amiga-Guide documentation.")
  31. (set #choose-guide-help " The Amiga-Guide documentation is a file in Hypertext-format, which may be viewed with MultiView or AmigaGuide.")
  32.  
  33. (set #choose-doc    "Please choose the language you want for the documentation file\n")
  34. (set #choose-doc-help    " The documentation-file contains the same information as the Amiga-Guide file, but in normal ASCII-format.")
  35.  
  36. (set #support-me    (cat "This is MAILWARE.\n\nIf you use this Program regulary, you have to send me a Mail.  Thank you.\n\n"))
  37. (set #ready        "BootSelector is now installed correctly. You can reset your machine for testing.")
  38.  
  39. ))
  40.  
  41. ;=============================================================================
  42. ; german strings
  43.  
  44. (if (= @language "deutsch")
  45. (
  46.  
  47. (set speech 1)
  48.  
  49. (SET #bad-kick        "BootSelector benötigt mindestens Kickstart 2.04 !")
  50.  
  51. (set #choose-docdest    "Bitte wählen Sie einen Zielpfad für die Dokumentationsdatei.")
  52. (set #choose-docdest-help " Die Dokumentationsdatei enthält dieselben Informationen wie die Amiga-Guide-Dokumentation, aber im normalen ASCII-Format.\n Der Zielpfad sollte der Pfad sein, in dem Sie normalerweise auch Ihre Anleitungen aufbewahren.")
  53. (set #choose-guidedest    "Bitte wählen Sie einen Zielpfad für die Amiga-Guide-Dokumentation.")
  54. (set #choose-guidedest-help " Die Amiga-Guide Dokumentation ist eine Datei im Hypertext-Format, die mit MultiView oder AmigaGuide angezeigt werden kann.\n Der Zielpfad sollte der Pfad sein, in dem sie normalerweise auch Ihre AmigaGuide-Dateien aufbewahren. Normalerweise ist das das Verzeichnis Help:")
  55.  
  56. (set #select-mainf    "\n\nMöchten Sie BootSelector 1.31 installieren?")
  57. (set #help-mainf    (cat " Das Hauptprogramm von BootSelector wird dazu benötigt, zwischen den verschiedenen Startup-Sequencen zu wählen. Dieses Programm sollte normalerwise im \"C:\" Verzeichnis Ihres Systems stehen, damit es leicht gefunden werden kann.\n\n" @copyfiles-help))
  58.  
  59. (set #SelectStartup    "Bitte wählen Sie alle Startup-Sequencen, die sie installiert haben möchten.\n\n")
  60. (set #SelectStartupHelp    " BootSelector benötigt alternative Startup-Sequencen, um zu funktionieren. Diese alternativen Scripte sollten im Verzeichnis S:Startup's stehen. Wenn Sie schon eine ältere Version von BootSelector benutzen, dann möchten Sie vielleicht nicht alle Startup-Sequencen kopieren. Bitte wählen Sie aus diesem Grund die benötigten alternativ-Scripte aus.\nDas Installer-Script macht eine Sicherheitskopie von Ihrer original-Startup-Sequence, damit bei einer eventuellen Fehlfunktion keine Daten verloren gehen.")
  61.  
  62. (set #choose-guide    "Bitte wählen Sie eine Sprache für die Amiga-Guide Dokumentation.")
  63. (set #choose-guide-help " Die Amiga-Guide Dokumentation ist eine Datei im Hypertext-Format, die mit MultiView oder AmigaGuide angezeigt werden kann.")
  64.  
  65. (set #choose-doc    "Bitte wählen Sie die Sprache für die Dokumentationsdatei.")
  66. (set #choose-doc-help    " Die Dokumentationsdatei enthält dieselben Informationen wie die Amiga-Guide-Dokumentation, aber im normalen ASCII-Format.")
  67.  
  68. (set #support-me    (cat "Dies ist MAILWARE.\n\nWenn Sie dieses Programm regelmäßig benutzen, sollten Sie mir eine Mail zukommen lassen.\nVielen Dank.\n\n"))
  69. (set #ready        "BootSelector ist jetzt komplett installiert. Sie können Ihren Rechner zurücksetzen um zu testen.")
  70.  
  71. ))
  72. ;=============================================================================
  73. ;
  74. ;****************************************************************************
  75. ;
  76. ; Setup
  77. ;
  78.  
  79. (if (< (/ (getversion) 65536) 37)
  80.     (abort #bad-kick)
  81. )
  82.  
  83. (set startup-dest "S:Startup's")
  84.  
  85. (complete 0)
  86.  
  87.  
  88. ;****************************************************************************
  89. ;
  90. ; Welcome
  91. ;
  92.  
  93. (complete 5)
  94.  
  95. (welcome)
  96.  
  97. (message "\nBootSelector\n Version 1.31 \n\nCopyright © 1995 "
  98.      "Michael Gollmick,\nAll Rights Reserved.\n\n\n"
  99.          #InstallVersion
  100. )
  101.  
  102. (complete 10)
  103.  
  104. (SET doc-dest
  105.     (ASKDIR
  106.         (PROMPT #choose-docdest)
  107.         (HELP #choose-docdest-help)
  108.         (DEFAULT "HELP:")
  109.     )
  110. )
  111. (SET guide-dest
  112.     (ASKDIR
  113.         (PROMPT #choose-guidedest)
  114.         (HELP #choose-guidedest-help)
  115.         (DEFAULT doc-dest)
  116.     )
  117. )
  118.  
  119. ;****************************************************************************
  120. ;
  121. ; Install Main Program
  122. ;
  123.  
  124. (copylib
  125.        (prompt #select-mainf )
  126.        (help   #help-mainf)
  127.        (source "C/BootSelector")
  128.        (confirm)
  129.        (dest   "C:")
  130. )
  131.  
  132. (complete 20)
  133.  
  134. ;****************************************************************************
  135. ;
  136. ; Install Startup-Sequences
  137. ;
  138.  
  139. (copyfiles
  140.        (prompt #mainf)
  141.        (help   #mainf)
  142.        (source "S:Startup-Sequence")
  143.        (dest   "S:")
  144.        (newname "Startup-Sequence_saveclone")
  145. )
  146.  
  147. (complete 30)
  148.  
  149. (IF (= (EXISTS "S:Startup's/Startup-SequenceI") 1)
  150.     (copyfiles
  151.            (source "S:Startup's/Startup-SequenceI")
  152.            (dest   startup-dest)
  153.                (newname "Startup-SequenceI_saveclone")
  154.         )
  155. )
  156.  
  157. (complete 35)
  158.  
  159. ; Get startup information
  160. (set startupchen (askoptions
  161.                (prompt #Selectstartup)
  162.                (choices "Startup-SequenceI" "Startup-SequenceII" "Startup-SequenceIII" "Startup-SequenceIV" "Startup-SequenceV" "Startup-SequenceVI")
  163.                (help #SelectStartupHelp)
  164.                (default 0)
  165.              )
  166. )
  167.  
  168. (complete 40)
  169.  
  170. (if startupchen
  171.    (
  172.       (if (IN startupchen 0)
  173.          (
  174.             (copyfiles
  175.                (source "S:Startup-Sequence")
  176.                (dest   startup-dest)
  177.                (newname "Startup-SequenceI")
  178.             )
  179.  
  180.     (complete 45)
  181.  
  182.         (copyfiles
  183.                (source "S/Startup-Sequence")
  184.                (dest   "S:")
  185.         )
  186.  
  187.  
  188.          )
  189.       )
  190.  
  191.  
  192. (complete 50)
  193.  
  194.       (if (IN startupchen 1)
  195.          (
  196.             (copyfiles
  197.                (source "S/Startup-SequenceII")
  198.                (dest   startup-dest)
  199.             )
  200.          )
  201.       )
  202.  
  203. (complete 55)
  204.  
  205.       (if (IN startupchen 2)
  206.          (
  207.             (copyfiles
  208.                (source "S/Startup-SequenceIII")
  209.                (dest   startup-dest)
  210.             )
  211.          )
  212.       )
  213.  
  214. (complete 60)
  215.  
  216.       (if (IN startupchen 3)
  217.          (
  218.             (copyfiles
  219.                (source "S/Startup-SequenceIV")
  220.                (dest   startup-dest)
  221.             )
  222.          )
  223.       )
  224.  
  225. (complete 65)
  226.  
  227.       (if (IN startupchen 4)
  228.          (
  229.             (copyfiles
  230.                (source "S/Startup-SequenceV")
  231.                (dest   startup-dest)
  232.             )
  233.          )
  234.       )
  235.  
  236. (complete 70)
  237.  
  238.       (if (IN startupchen 5)
  239.          (
  240.             (copyfiles
  241.                (source "S/Startup-SequenceVI")
  242.                (dest   startup-dest)
  243.             )
  244.          )
  245.       )
  246.  
  247.   )
  248. )
  249.  
  250. (complete 75)
  251.  
  252. ;****************************************************************************
  253. ;
  254. ; Choose Guide
  255. ;
  256.  
  257. (SET guide
  258.     (ASKCHOICE
  259.         (PROMPT #choose-guide)
  260.         (HELP #choose-guide-help)
  261.         (CHOICES
  262.             "English"
  263.             "Deutsch"
  264.         )
  265.         (DEFAULT speech)
  266.     )
  267. )
  268. (IF (= guide 0)
  269.     (COPYFILES
  270.         (SOURCE "DOC/BootSelector_engl.GUIDE")
  271.         (DEST guide-dest)
  272.                 (newname "BootSelector.GUIDE")
  273.                 (infos)
  274.     )
  275. )
  276. (IF (= guide 1)
  277.     (COPYFILES
  278.         (SOURCE "DOC/BootSelector_deu.GUIDE")
  279.         (DEST guide-dest)
  280.                 (newname "BootSelector.GUIDE")
  281.                 (infos)
  282.     )
  283. )
  284.  
  285. (complete 80)
  286.  
  287. ;****************************************************************************
  288. ;
  289. ; Choose Documentation
  290. ;
  291.  
  292. (SET guide
  293.     (ASKCHOICE
  294.         (PROMPT #choose-doc)
  295.         (HELP #choose-doc-help)
  296.         (CHOICES
  297.             "English"
  298.             "Deutsch"
  299.         )
  300.         (DEFAULT speech)
  301.     )
  302. )
  303. (IF (= guide 0)
  304.     (COPYFILES
  305.         (SOURCE "DOC/BootSelector_engl.DOC")
  306.         (DEST doc-dest)
  307.                 (newname "BootSelector.DOC")
  308.                 (infos)
  309.     )
  310. )
  311. (IF (= guide 1)
  312.     (COPYFILES
  313.         (SOURCE "DOC/BootSelector_deu.DOK")
  314.         (DEST doc-dest)
  315.                 (newname "BootSelector.DOK")
  316.                 (infos)
  317.     )
  318. )
  319.  
  320. (complete 90)
  321.  
  322. ;****************************************************************************
  323. ;
  324. ; Exit
  325. ;
  326.  
  327.     (complete 99)
  328.     (MESSAGE #support-me #ready)
  329.     (complete 100)
  330.  
  331. (EXIT (QUIET))
  332.